home *** CD-ROM | disk | FTP | other *** search
- object ClockSetup: TClockSetup
- Left = 0
- Top = 0
- Width = 701
- Height = 460
- TabOrder = 0
- object GroupBox_SystemSettings: TGroupBox
- Left = 0
- Top = 270
- Width = 450
- Height = 80
- Caption = 'System Settings'
- TabOrder = 2
- object CheckBox_Autoload: TCheckBox
- Left = 16
- Top = 24
- Width = 217
- Height = 17
- Caption = 'Load automatically when Windows starts'
- TabOrder = 0
- OnClick = CheckBox_AutoloadClick
- end
- object CheckBox_NoCustomize: TCheckBox
- Left = 16
- Top = 47
- Width = 137
- Height = 17
- Caption = 'Do not customize clock'
- TabOrder = 1
- OnClick = CheckBox_NoCustomizeClick
- end
- object Button_AdvancedSettings: TButton
- Left = 304
- Top = 40
- Width = 131
- Height = 25
- Caption = 'Advanced Settings ...'
- TabOrder = 2
- OnClick = Button_AdvancedSettingsClick
- end
- end
- object GroupBox_FormatSetup: TGroupBox
- Left = 0
- Top = 24
- Width = 450
- Height = 100
- Caption = 'Format Settings'
- TabOrder = 0
- object Label_FormatFor: TLabel
- Left = 16
- Top = 20
- Width = 20
- Height = 13
- Caption = 'Item'
- end
- object Label_FormatString: TLabel
- Left = 144
- Top = 20
- Width = 62
- Height = 13
- Caption = 'Format String'
- end
- object ComboBox_CopyFormat: TComboBox
- Left = 144
- Top = 65
- Width = 145
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 4
- Visible = False
- OnChange = ComboBox_CopyFormatChange
- Items.Strings = (
- 'Customize'
- 'Same as Clock'
- 'Same as Tooltip')
- end
- object ComboBox_FormatItem: TComboBox
- Left = 16
- Top = 36
- Width = 121
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 0
- OnChange = ComboBox_FormatItemChange
- Items.Strings = (
- 'Clock'
- 'Tooltip'
- 'Copy-to-clipboard')
- end
- object Button_Elements: TButton
- Left = 328
- Top = 63
- Width = 105
- Height = 25
- Caption = 'Format Elements ...'
- Default = True
- TabOrder = 2
- OnClick = Button_ElementsClick
- end
- object Edit_Format: TEdit
- Left = 144
- Top = 36
- Width = 289
- Height = 21
- HideSelection = False
- TabOrder = 1
- OnChange = Edit_FormatChange
- end
- object Edit_FixedWidth: TEdit
- Left = 232
- Top = 65
- Width = 57
- Height = 21
- TabOrder = 5
- OnChange = Edit_FixedWidthChange
- end
- object CheckBox_UseFixedWidth: TCheckBox
- Left = 144
- Top = 67
- Width = 81
- Height = 17
- Caption = 'Fixed width'
- TabOrder = 3
- OnClick = CheckBox_UseFixedWidthClick
- end
- end
- object GroupBox_FontSetup: TGroupBox
- Left = 0
- Top = 128
- Width = 450
- Height = 138
- Caption = 'Layout Settings'
- TabOrder = 1
- object Label_FontValue: TLabel
- Left = 16
- Top = 62
- Width = 185
- Height = 13
- AutoSize = False
- Caption = '_value_'
- end
- object Shape_ForeColor: TShape
- Left = 408
- Top = 22
- Width = 25
- Height = 25
- end
- object Shape_BackColor: TShape
- Left = 408
- Top = 78
- Width = 25
- Height = 25
- end
- object Bevel1: TBevel
- Left = 216
- Top = 16
- Width = 17
- Height = 113
- Shape = bsLeftLine
- end
- object Button_ChangeFont: TButton
- Left = 16
- Top = 78
- Width = 185
- Height = 25
- Caption = 'Font ...'
- TabOrder = 2
- OnClick = Button_ChangeFontClick
- end
- object CheckBox_UseCustomFont: TCheckBox
- Left = 24
- Top = 106
- Width = 177
- Height = 17
- Caption = 'Use Custom Font'
- TabOrder = 3
- OnClick = CheckBox_UseCustomFontClick
- end
- object Button_ChangeForeColor: TButton
- Left = 232
- Top = 22
- Width = 169
- Height = 25
- Caption = 'Text Color ...'
- TabOrder = 4
- OnClick = Button_ChangeForeColorClick
- end
- object CheckBox_UseCustomForeground: TCheckBox
- Left = 240
- Top = 50
- Width = 145
- Height = 17
- Caption = 'Use Custom Text Color'
- TabOrder = 5
- OnClick = CheckBox_UseCustomForegroundClick
- end
- object Button_ChangeBackColor: TButton
- Left = 232
- Top = 78
- Width = 169
- Height = 25
- Caption = 'Background Color ...'
- TabOrder = 6
- OnClick = Button_ChangeBackColorClick
- end
- object CheckBox_UseCustomBackground: TCheckBox
- Left = 240
- Top = 106
- Width = 145
- Height = 17
- Caption = 'Use Custom Background'
- TabOrder = 7
- OnClick = CheckBox_UseCustomBackgroundClick
- end
- object Edit_InternalBorder: TEdit
- Left = 144
- Top = 24
- Width = 57
- Height = 21
- TabOrder = 1
- OnChange = Edit_InternalBorderChange
- end
- object CheckBox_UseInternalBorder: TCheckBox
- Left = 16
- Top = 26
- Width = 124
- Height = 17
- Caption = 'Internal Border width'
- TabOrder = 0
- OnClick = CheckBox_UseInternalBorderClick
- end
- end
- object Panel_Caption: TPanel
- Left = 0
- Top = 0
- Width = 450
- Height = 20
- BevelOuter = bvNone
- TabOrder = 3
- object Shap_Caption: TShape
- Left = 0
- Top = 0
- Width = 450
- Height = 20
- Align = alClient
- Brush.Color = 12937777
- end
- object Label_Caption: TLabel
- Left = 6
- Top = 1
- Width = 88
- Height = 16
- Caption = 'Taskbar Clock'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWhite
- Font.Height = -13
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- end
- object FontDialog: TFontDialog
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Left = 336
- Top = 256
- end
- object ColorDialog_ForeColor: TColorDialog
- Left = 376
- Top = 256
- end
- object ColorDialog_BackColor: TColorDialog
- Left = 408
- Top = 256
- end
- object PopupMenu_Elements: TPopupMenu
- Left = 296
- Top = 256
- object SubMenu_Samples: TMenuItem
- Caption = 'Sample Formats'
- object MenuItem_sample1: TMenuItem
- Caption = 'Thu, 1 Jan 1998'
- OnClick = MenuItem_sample1Click
- end
- object MenuItem_sample2: TMenuItem
- Caption = 'January 01, 1998'
- OnClick = MenuItem_sample2Click
- end
- object MenuItem_sample3: TMenuItem
- Caption = '1 Jan '#39'98 (Thu)'
- OnClick = MenuItem_sample3Click
- end
- object MenuSeparator_Sample1: TMenuItem
- Caption = '-'
- end
- object MenuItem_sample4: TMenuItem
- Caption = '31/01/1998'
- OnClick = MenuItem_sample4Click
- end
- object MenuItem_sample5: TMenuItem
- Caption = '01-31-1998'
- OnClick = MenuItem_sample5Click
- end
- object MenuItem_sample6: TMenuItem
- Caption = '98.01.31'
- OnClick = MenuItem_sample6Click
- end
- object MenuSeparator_Sample2: TMenuItem
- Caption = '-'
- end
- object MenuItem_sample7: TMenuItem
- Caption = '3.00 pm'
- OnClick = MenuItem_sample7Click
- end
- object MenuItem_sample8: TMenuItem
- Caption = '15h00'
- OnClick = MenuItem_sample8Click
- end
- object MenuItem_sample9: TMenuItem
- Caption = '03:00:00 p'
- OnClick = MenuItem_sample9Click
- end
- end
- object SubMenu_Default: TMenuItem
- Caption = 'Default Formats'
- object MenuItem_default1: TMenuItem
- Caption = 'Default Short Time'#9'%time'
- OnClick = MenuItem_default1Click
- end
- object MenuItem_default2: TMenuItem
- Caption = 'Default Long Time'#9'%longtime'
- OnClick = MenuItem_default2Click
- end
- object MenuSeparator_Default1: TMenuItem
- Caption = '-'
- end
- object MenuItem_default3: TMenuItem
- Caption = 'Default Short Date'#9'%date'
- OnClick = MenuItem_default3Click
- end
- object MenuItem_default4: TMenuItem
- Caption = 'Default Long Date'#9'%longdate'
- OnClick = MenuItem_default4Click
- end
- end
- object MenuSeparator2: TMenuItem
- Caption = '-'
- end
- object SubMenu_TimeElements: TMenuItem
- Caption = 'Time Elements'
- object MenuItem_hour1: TMenuItem
- Caption = 'Hour (1-12)'#9'h'
- OnClick = MenuItem_hour1Click
- end
- object MenuItem_hour2: TMenuItem
- Caption = 'Hour (01-12)'#9'hh'
- OnClick = MenuItem_hour2Click
- end
- object MenuItem_hour3: TMenuItem
- Caption = 'Hour (0-23)'#9'H'
- OnClick = MenuItem_hour3Click
- end
- object MenuItem_hour4: TMenuItem
- Caption = 'Hour (00-23)'#9'HH'
- OnClick = MenuItem_hour4Click
- end
- object MenuSeparator_Time1: TMenuItem
- Caption = '-'
- end
- object MenuItem_min1: TMenuItem
- Caption = 'Minute (0-59)'#9'm'
- OnClick = MenuItem_min1Click
- end
- object MenuItem_min2: TMenuItem
- Caption = 'Minute (00-59)'#9'mm'
- OnClick = MenuItem_min2Click
- end
- object MenuSeparator_Time2: TMenuItem
- Caption = '-'
- end
- object MenuItem_sec1: TMenuItem
- Caption = 'Second (0-59)'#9's'
- OnClick = MenuItem_sec1Click
- end
- object MenuItem_sec2: TMenuItem
- Caption = 'Second (00-59)'#9'ss'
- OnClick = MenuItem_sec2Click
- end
- object MenuSeparator_Time3: TMenuItem
- Caption = '-'
- end
- object MenuItem_ampm1: TMenuItem
- Caption = 'A/P'#9't'
- OnClick = MenuItem_ampm1Click
- end
- object MenuItem_ampm2: TMenuItem
- Caption = 'AM/PM'#9'tt'
- OnClick = MenuItem_ampm2Click
- end
- object MenuSeparator_Time4: TMenuItem
- Caption = '-'
- end
- object MenuItem_tz1: TMenuItem
- Caption = 'Timezone Bias'#9'zz'
- OnClick = MenuItem_tz1Click
- end
- object MenuItem_tz2: TMenuItem
- Caption = 'Timezone Name'#9'ZZ'
- OnClick = MenuItem_tz2Click
- end
- end
- object SubMenu_DateElements: TMenuItem
- Caption = 'Date Elements'
- object MenuItem_day1: TMenuItem
- Caption = 'Day'#9'd'
- OnClick = MenuItem_day1Click
- end
- object MenuItem_day2: TMenuItem
- Caption = 'Day (2 digits)'#9'dd'
- OnClick = MenuItem_day2Click
- end
- object MenuItem_day3: TMenuItem
- Caption = 'Day Name (abbr.)'#9'ddd'
- OnClick = MenuItem_day3Click
- end
- object MenuItem_day4: TMenuItem
- Caption = 'Day Name (full)'#9'dddd'
- OnClick = MenuItem_day4Click
- end
- object MenuSeparator_Date1: TMenuItem
- Caption = '-'
- end
- object MenuItem_month1: TMenuItem
- Caption = 'Month'#9'M'
- OnClick = MenuItem_month1Click
- end
- object MenuItem_month2: TMenuItem
- Caption = 'Month (2 digits)'#9'MM'
- OnClick = MenuItem_month2Click
- end
- object MenuItem_month3: TMenuItem
- Caption = 'Month Name (abbr.)'#9'MMM'
- OnClick = MenuItem_month3Click
- end
- object MenuItem_month4: TMenuItem
- Caption = 'Month Name (full)'#9'MMMM'
- OnClick = MenuItem_month4Click
- end
- object MenuSeparator_Date2: TMenuItem
- Caption = '-'
- end
- object MenuItem_year1: TMenuItem
- Caption = 'Year (2 digits)'#9'yy'
- OnClick = MenuItem_year1Click
- end
- object MenuItem_year2: TMenuItem
- Caption = 'Year (4 digits)'#9'yyyy'
- OnClick = MenuItem_year2Click
- end
- object MenuSeparator_Date3: TMenuItem
- Caption = '-'
- end
- object MenuItem_dayord1: TMenuItem
- Caption = 'Day of Year'#9'D'
- OnClick = MenuItem_dayord1Click
- end
- object MenuItem_dayord2: TMenuItem
- Caption = 'Day of Year (3 digits)'#9'DDD'
- OnClick = MenuItem_dayord2Click
- end
- object MenuItem_week1: TMenuItem
- Caption = 'Week Number'#9'w'
- OnClick = MenuItem_week1Click
- end
- object MenuItem_week2: TMenuItem
- Caption = 'Week Number (2 digits)'#9'ww'
- OnClick = MenuItem_week2Click
- end
- end
- object SubMenu_ResourceElements: TMenuItem
- Caption = 'Resource Elements'
- object MenuItem_CPUUsage: TMenuItem
- Caption = 'CPU Usage (%)'#9'%cpu'
- OnClick = MenuItem_CPUUsageClick
- end
- object MenuSeparator_Resource1: TMenuItem
- Caption = '-'
- end
- object MenuItem_Mem1: TMenuItem
- Caption = 'Physical memory (RAM) load (%)'#9'%mem'
- OnClick = MenuItem_Mem1Click
- end
- object MenuItem_Mem2: TMenuItem
- Caption = 'Physical memory (RAM) available (MB)'#9'%mema'
- OnClick = MenuItem_Mem2Click
- end
- object MenuItem_Mem3: TMenuItem
- Caption = 'Physical memory (RAM) total (MB)'#9'%memt'
- OnClick = MenuItem_Mem3Click
- end
- object MenuSeparator_Resource2: TMenuItem
- Caption = '-'
- end
- object MenuItem_Power1: TMenuItem
- Caption = 'AC line status (On/Off)'#9'%ac'
- OnClick = MenuItem_Power1Click
- end
- object MenuItem_Power2: TMenuItem
- Caption = 'Battery life (%)'#9'%batt'
- OnClick = MenuItem_Power2Click
- end
- object MenuItem_Power3: TMenuItem
- Caption = 'Battery life time (hh:mm)'#9'%timebatt'
- OnClick = MenuItem_Power3Click
- end
- end
- object MenuSeparator1: TMenuItem
- Caption = '-'
- end
- object MenuItem_SingleQuote: TMenuItem
- Caption = 'Single Quote'#9'%sq'
- OnClick = MenuItem_SingleQuoteClick
- end
- object Invisibleseparator1: TMenuItem
- Caption = 'Invisible separator'#9'~'
- OnClick = Invisibleseparator1Click
- end
- object Linebreak1: TMenuItem
- Caption = 'Line break'#9'|'
- OnClick = Linebreak1Click
- end
- object MenuItem_LiteralText: TMenuItem
- Caption = 'Literal Text'#9#39'..'#39
- OnClick = MenuItem_LiteralTextClick
- end
- end
- object IdHTTP1: TIdHTTP
- MaxLineAction = maException
- AllowCookies = True
- ProxyParams.BasicAuthentication = False
- ProxyParams.ProxyPort = 0
- Request.ContentLength = -1
- Request.ContentRangeEnd = 0
- Request.ContentRangeStart = 0
- Request.Accept = 'text/html, */*'
- Request.BasicAuthentication = False
- Request.UserAgent = 'Mozilla/3.0 (compatible; Indy Library)'
- HTTPOptions = [hoForceEncodeParams]
- Left = 232
- Top = 312
- end
- object IdAntiFreeze1: TIdAntiFreeze
- Left = 264
- Top = 312
- end
- end
-